﻿'----------------
'ComClass--------
Const CLSID_AcadHyperlink = "{988F4102-E6E3-4282-ACAC-55270827F2A8}"
'----------------
'ComClass--------
Const CLSID_AcadDynamicBlockReferenceProperty = "{0215A4C0-5431-4FD0-9B06-46589B5C4939}"
'----------------
'ComClass--------
Const CLSID_AcadAcCmColor = "{C8C18F89-794D-466B-8B97-95634D9890EF}"
'----------------
'ComClass--------
Const CLSID_AcadObject = "{9A21C6C5-27FC-4442-8590-575E7AFD73BB}"
'Event--------
Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadObject_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadXRecord = "{F5522F0C-962A-48AC-9992-E81B07628F1F}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadXRecord_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSortentsTable = "{048ED0E0-12CF-4C0F-9FFA-947C2FBE8C8E}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSortentsTable_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimStyle = "{B80687F9-FA4C-4735-9DC4-E5715F2BC698}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimStyle_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLayer = "{BAE5802A-CF21-4F9C-AE04-D98F4036AC31}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLayer_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLineType = "{0D555CE0-304A-47A6-858B-B145209A3982}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLineType_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadMaterial = "{76193B93-A799-44D6-96F2-76742437E097}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadMaterial_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadRegisteredApplication = "{CC23CA32-9892-4FBA-A108-FE31CA0F35A6}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadRegisteredApplication_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadTextStyle = "{F868EAEC-1B73-4F5E-BA73-90EBA94E75BE}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadTextStyle_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadUCS = "{849AFB5B-D6C9-4924-A712-F7118FF9611F}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadUCS_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadView = "{C061C82C-D041-4214-BB07-B608107CEFCB}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadView_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadViewport = "{1D625598-C876-4C51-8EF5-F9D8F96F62AA}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadViewport_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadGroup = "{08A60FF7-BB37-44F4-9759-0ADA6C7B9CC9}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadGroup_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPlotConfiguration = "{EA34A0C0-5CE7-4701-A6FA-117D25CD5EBB}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPlotConfiguration_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLayout = "{4A756F5F-CBA4-428B-B17F-AF80C0C8502D}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLayout_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadIdPair = "{14679E3B-C952-4998-8E13-4B1286E6DD99}"
'----------------
'ComClass--------
Const CLSID_AcadTableStyle = "{72EFC580-D085-4B81-8C55-26A79E445338}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadTableStyle_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSectionSettings = "{26A325BD-C715-48C5-AE7D-8E9EBEE01922}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSectionSettings_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSectionTypeSettings = "{F2A7D936-C8D3-4A96-B791-3DC0B718C507}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSectionTypeSettings_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadHyperlinks = "{1481B385-759A-4B00-9257-E96357563999}"
'----------------
'ComClass--------
Const CLSID_AcadDictionary = "{E70DE962-842A-4488-9481-1D0FD72A020F}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDictionary_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLayers = "{E177A457-9EAA-43C3-A3CE-84874A28F6CA}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLayers_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimStyles = "{794199C5-827C-41C8-8CB2-3A1EA056AF5E}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimStyles_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDictionaries = "{89F0FC31-3B1D-494B-A75B-6BD4FA527B8A}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDictionaries_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLineTypes = "{C8EC7647-1E79-4F13-81D7-2EED803D0D22}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLineTypes_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadMaterials = "{1CFD327B-45B3-4FD5-90B2-F89A57052783}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadMaterials_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadTextStyles = "{BF224DC3-B602-4EEE-BFE9-9E4E0AED6837}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadTextStyles_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadUCSs = "{1EA072EE-57FD-495E-889C-8243C3BDBDBC}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadUCSs_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadRegisteredApplications = "{713C0E8A-5AE8-4695-B442-5ED6C4FE5C42}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadRegisteredApplications_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadViews = "{0B38CACA-3D3C-48EA-BEB5-7D95F4F6EE15}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadViews_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadViewports = "{2709544A-5B24-4F9F-A5DA-CEC7297D3A4E}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadViewports_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadGroups = "{162EF0A1-5A33-46F2-ACCF-CA388B084A09}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadGroups_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadBlocks = "{64B99FDB-1D85-447F-98C7-569DBDA723DB}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadBlocks_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLayouts = "{6BCE6F6E-C050-4F39-BD98-E2743949F724}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLayouts_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPlotConfigurations = "{12545889-6D32-4424-9967-1E1D7BD1F809}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPlotConfigurations_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadEntity = "{D66873EA-AAE5-41CC-8DD2-8CE3228E9F89}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadEntity_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadRasterImage = "{1FD7F53F-7ED5-439C-9A77-A3821CD09E98}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadRasterImage_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_Acad3DFace = "{8AA16DFC-DFC6-4B51-8FA2-A5D812BE33BF}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type Acad3DFace_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_Acad3DPolyline = "{46C56738-39C6-4240-8B9B-008CCD769A84}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type Acad3DPolyline_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadRegion = "{38C8B14E-7879-4DA9-8C3F-8CAAC359293A}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadRegion_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_Acad3DSolid = "{70DBCAE8-8C2B-450C-9E1D-43E4686C6512}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type Acad3DSolid_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadArc = "{EF01D98A-747B-4522-AD70-991B90855DBF}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadArc_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadAttribute = "{E29F6C45-6927-4508-8F3F-34105FD3FC5F}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadAttribute_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadAttributeReference = "{40770568-0D5E-49D4-BE47-BC47A4F0B0A4}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadAttributeReference_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadBlockReference = "{1E8A29BA-827D-4031-A4A3-AE7999B402F6}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadBlockReference_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadCircle = "{F78DCF7C-043D-45FC-9D21-676FC307BA3F}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadCircle_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadEllipse = "{48FEFCD7-5D7C-4E4A-9F11-60E69A31D4B1}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadEllipse_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadHatch = "{FE718E8F-C3AA-4F30-9103-432450CF1DA1}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadHatch_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLeader = "{FA97F7A7-FD19-4D55-ABF2-CFEFFF777426}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLeader_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLWPolyline = "{E9C07CEC-7B82-49E4-BBA2-7533B88E9D64}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLWPolyline_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLine = "{4BD03680-3C0F-4501-AFF7-3D008586917F}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLine_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadMText = "{9906CDFC-DB2C-4126-9422-13139B148495}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadMText_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPoint = "{48270F9E-CCF6-4C79-B6FF-267C960E6425}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPoint_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPolyline = "{0C3393F8-94F5-4B79-8C01-49A2D0CC0FE9}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPolyline_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPolygonMesh = "{DB207560-8449-4FAF-BDC2-61676EB012D4}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPolygonMesh_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadRay = "{FD51ED8A-D518-4554-B236-B6E9D234FD03}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadRay_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadShape = "{AC5CECFA-F03A-41D2-A89C-704C44935941}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadShape_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSolid = "{A6A3D586-44CF-44C2-A92C-620BB713B4F2}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSolid_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSpline = "{59A224A2-BEF8-4C89-96E0-83A5411ABB6C}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSpline_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadText = "{E4222C78-3670-4BB1-9AD4-7D8F3E581F2D}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadText_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadTolerance = "{F40E2FF0-4D77-40B2-9A44-A3AEECCE8EFF}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadTolerance_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadTrace = "{071339A1-1946-44B2-B63E-50459B15DB86}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadTrace_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadXline = "{2BCA857B-A18B-4AFA-B183-CC0E49C12058}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadXline_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPViewport = "{F196F03F-651A-43AF-BE34-D11942F24445}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPViewport_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadMInsertBlock = "{B1560245-190E-4BBD-81DF-9B642D0E5325}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadMInsertBlock_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPolyfaceMesh = "{622F6193-E4DD-46E6-BC66-2ED88E9FD28D}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPolyfaceMesh_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadMLine = "{87F5CF8F-A06D-498F-A05F-E520E6B570DB}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadMLine_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadExternalReference = "{B2A579E0-A797-40B1-8AEE-A8F6404719F8}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadExternalReference_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadTable = "{2C7D1157-7D50-4A88-9777-5EBBA3189AB8}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadTable_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadOle = "{475C7B4A-6964-4F9E-9708-05A16EAC31D0}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadOle_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadHelix = "{DE74F5AD-DA2F-429F-BAF9-850A2808D585}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadHelix_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSurface = "{8ED07FEF-E1B0-4CC3-B2BA-D354828AB952}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSurface_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPlaneSurface = "{6451051B-AD22-4C6A-ACCE-013A0E1DDBC3}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPlaneSurface_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadExtrudedSurface = "{C2D4ACCC-A3D1-4A0A-AD59-0DD8BA3D5EE1}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadExtrudedSurface_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadRevolvedSurface = "{9ECF83FB-23C5-43B6-83DE-93CFBDD74D4A}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadRevolvedSurface_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSweptSurface = "{FE054BB2-AF94-40AC-88AA-2F59F7018B1D}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSweptSurface_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadLoftedSurface = "{3497C2EC-5684-4B21-AF74-F6760E0221DC}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadLoftedSurface_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSection = "{7C239DAB-BC87-45F3-B7B1-FCC1541A235B}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSection_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSectionManager = "{8795DA35-54AA-4DCB-A065-E7397C8568A9}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadSectionManager_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDwfUnderlay = "{0D0CFF77-1350-4902-9AE0-8C9A3C22EE34}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDwfUnderlay_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDgnUnderlay = "{11EC23A0-50D1-4129-8D37-8D1148B800DE}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDgnUnderlay_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadSubEntity = "{2B82582B-C683-49C2-AC5E-20105AD47CE9}"
'----------------
'ComClass--------
Const CLSID_AcadSubEntSolidFace = "{4FC6CEE8-23F6-405F-8BA2-1F7036050715}"
'----------------
'ComClass--------
Const CLSID_AcadSubEntSolidEdge = "{559E3754-6F34-47AF-BC1F-E2BE712B16EB}"
'----------------
'ComClass--------
Const CLSID_AcadSubEntSolidVertex = "{203D46FB-C6F0-4E95-B702-C1E01ADEBC04}"
'----------------
'ComClass--------
Const CLSID_AcadSubEntSolidNode = "{25F43C48-6A48-4646-8EC4-D34563D6A4F4}"
'----------------
'ComClass--------
Const CLSID_AcadDimension = "{6F56D7C9-18DD-4C15-9FA8-C54E3610EC40}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimension_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimAligned = "{BF4CC07E-E9BB-40D6-873F-855B211033B9}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimAligned_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimAngular = "{750AEC19-2E4C-4ED9-9B9F-F9CAFCD060F3}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimAngular_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimDiametric = "{85452F88-5071-492E-B850-2E3C586DCBD8}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimDiametric_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimOrdinate = "{44A52280-AE56-490D-890C-89FB7279ED6B}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimOrdinate_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimRadial = "{2C74F89E-7421-46B4-BA54-F86F1BD9F237}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimRadial_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimRotated = "{BBF6A206-CB04-479D-96AE-349E1E83319A}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimRotated_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDim3PointAngular = "{BC71DEA1-D6FB-48B8-AB06-D151C81BBCDD}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDim3PointAngular_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimArcLength = "{ABBE3F83-D585-4A50-9B69-198B0F566F2E}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimArcLength_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadDimRadialLarge = "{D86B6C47-11F2-4D95-B635-EA575F0892FC}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadDimRadialLarge_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadBlock = "{20E47D5B-529A-45BD-8E77-BF1A3064A008}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadBlock_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadModelSpace = "{B5EE2B68-9A23-4BCD-BB77-FEA6DFB24DD6}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadModelSpace_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadPaperSpace = "{FE317223-8EDE-4684-B424-E48B9EA90220}"
'Event--------
'Const IID_IAcadObjectEvents = "{62998C8F-62F6-455F-806B-1604A1892F62}"
Type AcadPaperSpace_IAcadObjectEvents Extends CIUnknown
   Declare Virtual Function Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   On_Modified As FUNCTION(ByRef pObject As Any Ptr) As HRESULT
   DECLARE CONSTRUCTOR()
End Type
'----------------
'ComClass--------
Const CLSID_AcadFileDependency = "{CD865713-70D6-4E15-BB7B-9B99AD9DEB85}"
'----------------
'ComClass--------
Const CLSID_AcadFileDependencies = "{834CE679-2E47-49DE-9E41-FEC87E9192EB}"
'----------------
'ComClass--------
Const CLSID_AcadSummaryInfo = "{798391FE-4AF2-4851-9DDA-1F0D70C02A9E}"
'----------------
'ComClass--------
Const CLSID_AcadDatabasePreferences = "{1D6DFD6A-9E16-435A-9327-6FFEC6BA372F}"
'----------------
'ComClass--------
Const CLSID_AcadDatabase = "{B53CEF4B-1A13-49DE-BBC5-A7100FB2F38C}"
'----------------
'ComClass--------
Const CLSID_AcadSecurityParams = "{DF6525C2-6358-4B07-813D-708120C5FE1A}"
'----------------
'ComClass--------
Const CLSID_AcadLayerStateManager = "{4B40437B-8972-4444-BBE3-1588FF55F203}"
'----------------
'ComClass--------
Const CLSID_AcadState = "{2D46F523-8E0C-4E6D-A4BB-68ACED0C676C}"
'----------------
'ComClass--------
Const CLSID_AcadApplication = "{28B7AA99-C0F9-4C47-995E-8A8D729603A1}"
'Event--------
Const IID__DAcadApplicationEvents = "{E8D59748-B414-4BE6-AF82-870C62C0CF4C}"
Type AcadApplication__DAcadApplicationEvents Extends CIDispatch
   DECLARE Function Invoke(ByVal dispIdMember As DISPID, ByVal riid As Const IID Const Ptr, ByVal lcid As LCID, ByVal wFlags As WORD, ByVal pDispParams As DISPPARAMS Ptr, ByVal pVarResult As VARIANT Ptr, ByVal pExcepInfo As EXCEPINFO Ptr, ByVal puArgErr As UINT Ptr) As HRESULT
   DECLARE Sub _DAcadApplicationEvents_ObjectEvent(ByVal Info As EventInfo)
   Declare Constructor()
   SysVarChanged As FUNCTION(ByVal SysvarName As BSTR,ByVal newVal As Variant Ptr) As HRESULT
   NewDrawing As FUNCTION() As HRESULT
   AppActivate As FUNCTION() As HRESULT
   AppDeactivate As FUNCTION() As HRESULT
   WindowMovedOrResized As FUNCTION(ByVal HWNDFrame As Long,ByVal bMoved As VARIANT_BOOL) As HRESULT
   BeginModal As FUNCTION() As HRESULT
   EndModal As FUNCTION() As HRESULT
   BeginQuit As FUNCTION(ByRef Cancel As VARIANT_BOOL) As HRESULT
   BeginFileDrop As FUNCTION(ByVal FileName As BSTR,ByRef Cancel As VARIANT_BOOL) As HRESULT
   ARXLoaded As FUNCTION(ByVal AppName As BSTR) As HRESULT
   ARXUnloaded As FUNCTION(ByVal AppName As BSTR) As HRESULT
   BeginPlot As FUNCTION(ByVal DrawingName As BSTR) As HRESULT
   EndPlot As FUNCTION(ByVal DrawingName As BSTR) As HRESULT
   BeginSave As FUNCTION(ByVal FileName As BSTR) As HRESULT
   EndSave As FUNCTION(ByVal FileName As BSTR) As HRESULT
   BeginOpen As FUNCTION(ByRef FileName As BSTR) As HRESULT
   EndOpen As FUNCTION(ByVal FileName As BSTR) As HRESULT
   BeginCommand As FUNCTION(ByVal CommandName As BSTR) As HRESULT
   EndCommand As FUNCTION(ByVal CommandName As BSTR) As HRESULT
   BeginLisp As FUNCTION(ByVal FirstLine As BSTR) As HRESULT
   EndLisp As FUNCTION() As HRESULT
   LispCancelled As FUNCTION() As HRESULT
   WindowChanged As FUNCTION(ByVal WindowState As Any Ptr) As HRESULT
End Type
'----------------
'ComClass--------
Const CLSID_AcadSelectionSet = "{B4D2D9F3-C5D1-44AF-913A-BAFB1F357950}"
'----------------
'ComClass--------
Const CLSID_AcadSelectionSets = "{2F6DB935-F865-4709-808C-ADA241F7E592}"
'----------------
'ComClass--------
Const CLSID_AcadPlot = "{82F4F750-8BD9-4880-A71D-02FB08EBFAEA}"
'----------------
'ComClass--------
Const CLSID_AcadPreferences = "{DBEE68F4-2BF2-43A2-BF9B-353FCDE16782}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesDrafting = "{98780B52-05AD-4739-BC5C-B3BAD3D5296E}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesDisplay = "{26352416-E145-4D82-92E5-3EC921A4A58E}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesFiles = "{CF7E7DCE-3696-4C9F-B29E-F8980C7650B0}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesOpenSave = "{6C6322F2-DB92-4304-8790-C6AD52685872}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesOutput = "{E6EAB939-E3AF-4FAB-AFDC-2A77D0D5B3B8}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesProfiles = "{767E31F2-FCF8-478D-8836-223DFEE4D6B3}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesSelection = "{2B4D4DEA-4EC2-4C06-ADC9-B4992734A757}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesSystem = "{06527FA0-74A3-4791-AA88-A63509AC82FB}"
'----------------
'ComClass--------
Const CLSID_AcadPreferencesUser = "{FFDC2937-8113-401C-A224-E9A034287EA6}"
'----------------
'ComClass--------
Const CLSID_AcadMenuGroups = "{E2DA6C15-C324-457C-A136-69279E9C394E}"
'----------------
'ComClass--------
Const CLSID_AcadMenuGroup = "{6BD98AF5-A2B2-46A2-87EE-C3CB29A5A9CC}"
'----------------
'ComClass--------
Const CLSID_AcadMenuBar = "{64B283AE-0D0B-4C24-9E94-B2F26C210C0E}"
'----------------
'ComClass--------
Const CLSID_AcadPopupMenus = "{8BA4FD46-2F7C-4220-987D-71DCDEC4E739}"
'----------------
'ComClass--------
Const CLSID_AcadPopupMenu = "{194C5C7B-FD4B-42B7-B3A7-A5F3DFFDC999}"
'----------------
'ComClass--------
Const CLSID_AcadPopupMenuItem = "{EA6F8E27-1BD3-468A-8A57-EE2E2116AAC4}"
'----------------
'ComClass--------
Const CLSID_AcadUtility = "{30A1B04F-D62D-4925-96AC-9CB7478B910F}"
'----------------
'ComClass--------
Const CLSID_AcadDocument = "{7AABBB95-79BE-4C0F-8024-EB6AF271231C}"
'Event--------
Const IID__DAcadDocumentEvents = "{C814C69D-A74B-494C-8EE6-23731B145CCB}"
Type AcadDocument__DAcadDocumentEvents Extends CIDispatch
   DECLARE Function Invoke(ByVal dispIdMember As DISPID, ByVal riid As Const IID Const Ptr, ByVal lcid As LCID, ByVal wFlags As WORD, ByVal pDispParams As DISPPARAMS Ptr, ByVal pVarResult As VARIANT Ptr, ByVal pExcepInfo As EXCEPINFO Ptr, ByVal puArgErr As UINT Ptr) As HRESULT
   DECLARE Sub _DAcadDocumentEvents_ObjectEvent(ByVal Info As EventInfo)
   Declare Constructor()
   BeginSave As FUNCTION(ByVal FileName As BSTR) As HRESULT
   EndSave As FUNCTION(ByVal FileName As BSTR) As HRESULT
   BeginCommand As FUNCTION(ByVal CommandName As BSTR) As HRESULT
   EndCommand As FUNCTION(ByVal CommandName As BSTR) As HRESULT
   BeginLisp As FUNCTION(ByVal FirstLine As BSTR) As HRESULT
   EndLisp As FUNCTION() As HRESULT
   LispCancelled As FUNCTION() As HRESULT
   SelectionChanged As FUNCTION() As HRESULT
   Activate As FUNCTION() As HRESULT
   Deactivate As FUNCTION() As HRESULT
   BeginRightClick As FUNCTION(ByVal PickPoint As Variant Ptr) As HRESULT
   BeginShortcutMenuDefault As FUNCTION(ByRef ShortcutMenu As Any Ptr) As HRESULT
   BeginShortcutMenuEdit As FUNCTION(ByRef ShortcutMenu As Any Ptr,ByRef SelectionSet As Any Ptr) As HRESULT
   BeginShortcutMenuCommand As FUNCTION(ByRef ShortcutMenu As Any Ptr,ByVal Command As BSTR) As HRESULT
   BeginShortcutMenuGrip As FUNCTION(ByRef ShortcutMenu As Any Ptr) As HRESULT
   BeginShortcutMenuOsnap As FUNCTION(ByRef ShortcutMenu As Any Ptr) As HRESULT
   EndShortcutMenu As FUNCTION(ByRef ShortcutMenu As Any Ptr) As HRESULT
   BeginDoubleClick As FUNCTION(ByVal PickPoint As Variant Ptr) As HRESULT
   ObjectAdded As FUNCTION(ByVal Object As IDispatch Ptr) As HRESULT
   ObjectErased As FUNCTION(ByVal ObjectID As Long) As HRESULT
   ObjectModified As FUNCTION(ByVal Object As IDispatch Ptr) As HRESULT
   BeginPlot As FUNCTION(ByVal DrawingName As BSTR) As HRESULT
   EndPlot As FUNCTION(ByVal DrawingName As BSTR) As HRESULT
   WindowMovedOrResized As FUNCTION(ByVal HWNDFrame As Long,ByVal bMoved As VARIANT_BOOL) As HRESULT
   LayoutSwitched As FUNCTION(ByVal LayoutName As BSTR) As HRESULT
   WindowChanged As FUNCTION(ByVal WindowState As Any Ptr) As HRESULT
   BeginClose As FUNCTION() As HRESULT
   BeginDocClose As FUNCTION(ByRef Cancel As VARIANT_BOOL) As HRESULT
End Type
'----------------
'ComClass--------
Const CLSID_AcadDocuments = "{CA6096C3-1A75-45FF-BCBF-A198769571CC}"
'----------------
'ComClass--------
Const CLSID_AcadToolbars = "{6DA5711F-DFD4-4D81-8D23-F7AEA68A920C}"
'----------------
'ComClass--------
Const CLSID_AcadToolbar = "{B002FDCB-B013-4654-ACE9-8256ABB240F9}"
'----------------
'ComClass--------
Const CLSID_AcadToolbarItem = "{1AAB334A-492D-4502-9F59-247C4966E705}"
'Implements----
Function AcadObject_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadObject_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadXRecord_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadXRecord_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSortentsTable_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSortentsTable_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimStyle_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimStyle_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLayer_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLayer_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLineType_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLineType_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadMaterial_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadMaterial_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadRegisteredApplication_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadRegisteredApplication_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadTextStyle_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadTextStyle_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadUCS_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadUCS_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadView_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadView_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadViewport_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadViewport_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadGroup_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadGroup_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPlotConfiguration_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPlotConfiguration_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLayout_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLayout_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadTableStyle_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadTableStyle_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSectionSettings_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSectionSettings_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSectionTypeSettings_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSectionTypeSettings_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDictionary_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDictionary_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLayers_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLayers_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimStyles_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimStyles_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDictionaries_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDictionaries_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLineTypes_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLineTypes_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadMaterials_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadMaterials_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadTextStyles_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadTextStyles_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadUCSs_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadUCSs_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadRegisteredApplications_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadRegisteredApplications_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadViews_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadViews_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadViewports_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadViewports_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadGroups_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadGroups_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadBlocks_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadBlocks_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLayouts_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLayouts_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPlotConfigurations_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPlotConfigurations_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadEntity_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadEntity_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadRasterImage_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadRasterImage_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function Acad3DFace_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR Acad3DFace_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function Acad3DPolyline_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR Acad3DPolyline_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadRegion_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadRegion_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function Acad3DSolid_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR Acad3DSolid_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadArc_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadArc_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadAttribute_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadAttribute_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadAttributeReference_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadAttributeReference_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadBlockReference_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadBlockReference_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadCircle_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadCircle_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadEllipse_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadEllipse_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadHatch_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadHatch_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLeader_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLeader_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLWPolyline_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLWPolyline_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLine_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLine_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadMText_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadMText_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPoint_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPoint_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPolyline_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPolyline_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPolygonMesh_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPolygonMesh_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadRay_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadRay_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadShape_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadShape_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSolid_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSolid_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSpline_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSpline_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadText_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadText_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadTolerance_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadTolerance_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadTrace_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadTrace_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadXline_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadXline_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPViewport_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPViewport_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadMInsertBlock_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadMInsertBlock_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPolyfaceMesh_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPolyfaceMesh_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadMLine_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadMLine_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadExternalReference_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadExternalReference_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadTable_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadTable_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadOle_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadOle_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadHelix_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadHelix_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSurface_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSurface_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPlaneSurface_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPlaneSurface_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadExtrudedSurface_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadExtrudedSurface_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadRevolvedSurface_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadRevolvedSurface_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSweptSurface_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSweptSurface_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadLoftedSurface_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadLoftedSurface_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSection_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSection_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadSectionManager_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadSectionManager_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDwfUnderlay_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDwfUnderlay_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDgnUnderlay_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDgnUnderlay_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimension_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimension_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimAligned_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimAligned_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimAngular_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimAngular_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimDiametric_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimDiametric_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimOrdinate_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimOrdinate_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimRadial_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimRadial_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimRotated_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimRotated_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDim3PointAngular_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDim3PointAngular_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimArcLength_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimArcLength_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDimRadialLarge_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadDimRadialLarge_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadBlock_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadBlock_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadModelSpace_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadModelSpace_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadPaperSpace_IAcadObjectEvents.Modified_ObjectEvent(ByRef pObject As Any Ptr) As HRESULT
   Return On_Modified(pObject)
End Function
CONSTRUCTOR AcadPaperSpace_IAcadObjectEvents()
   IIDFromString(IID_IAcadObjectEvents, @Base.EventIID)
END CONSTRUCTOR
Sub AcadApplication__DAcadApplicationEvents. _DAcadApplicationEvents_ObjectEvent(ByVal Info As EventInfo)
   Select Case Info.EventID
      Case &H1      'SysVarChanged
         If SysVarChanged then SysVarChanged(info.EventParameters.Item(0).Value.bstrVal, info.EventParameters.Item(1).Value.pvarVal)
      Case &H2      'NewDrawing
         If NewDrawing then NewDrawing()
      Case &H3      'AppActivate
         If AppActivate then AppActivate()
      Case &H4      'AppDeactivate
         If AppDeactivate then AppDeactivate()
      Case &H5      'WindowMovedOrResized
         If WindowMovedOrResized then WindowMovedOrResized(info.EventParameters.Item(0).Value.lVal, info.EventParameters.Item(1).Value.boolVal)
      Case &H6      'BeginModal
         If BeginModal then BeginModal()
      Case &H7      'EndModal
         If EndModal then EndModal()
      Case &H8      'BeginQuit
         If BeginQuit then BeginQuit(info.EventParameters.Item(0).Value.boolVal)
      Case &HA      'BeginFileDrop
         If BeginFileDrop then BeginFileDrop(info.EventParameters.Item(0).Value.bstrVal, info.EventParameters.Item(1).Value.boolVal)
      Case &HB      'ARXLoaded
         If ARXLoaded then ARXLoaded(info.EventParameters.Item(0).Value.bstrVal)
      Case &HC      'ARXUnloaded
         If ARXUnloaded then ARXUnloaded(info.EventParameters.Item(0).Value.bstrVal)
      Case &HD      'BeginPlot
         If BeginPlot then BeginPlot(info.EventParameters.Item(0).Value.bstrVal)
      Case &HE      'EndPlot
         If EndPlot then EndPlot(info.EventParameters.Item(0).Value.bstrVal)
      Case &H13      'BeginSave
         If BeginSave then BeginSave(info.EventParameters.Item(0).Value.bstrVal)
      Case &H14      'EndSave
         If EndSave then EndSave(info.EventParameters.Item(0).Value.bstrVal)
      Case &H15      'BeginOpen
         If BeginOpen then BeginOpen(info.EventParameters.Item(0).Value.bstrVal)
      Case &H16      'EndOpen
         If EndOpen then EndOpen(info.EventParameters.Item(0).Value.bstrVal)
      Case &H11      'BeginCommand
         If BeginCommand then BeginCommand(info.EventParameters.Item(0).Value.bstrVal)
      Case &H12      'EndCommand
         If EndCommand then EndCommand(info.EventParameters.Item(0).Value.bstrVal)
      Case &HF      'BeginLisp
         If BeginLisp then BeginLisp(info.EventParameters.Item(0).Value.bstrVal)
      Case &H10      'EndLisp
         If EndLisp then EndLisp()
      Case &H18      'LispCancelled
         If LispCancelled then LispCancelled()
      Case &H19      'WindowChanged
         If WindowChanged then WindowChanged(info.EventParameters.Item(0).Value.byref)
   End Select
End Sub
CONSTRUCTOR AcadApplication__DAcadApplicationEvents()
   IIDFromString(IID__DAcadApplicationEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadApplication__DAcadApplicationEvents.Invoke(ByVal dispIdMember As DISPID, ByVal riid As Const IID Const Ptr, ByVal lcid As LCID, ByVal wFlags As WORD, ByVal pDispParams As DISPPARAMS Ptr, ByVal pVarResult As VARIANT Ptr, ByVal pExcepInfo As EXCEPINFO Ptr, ByVal puArgErr As UINT Ptr) As HRESULT
   Dim Info as EventInfo
   Info.EventID = dispIdMember
   Info.EventParameters.Count = pDispParams->cArgs
   If pDispParams->cArgs > 0 Then
      ReDim Info.EventParameters.Item(pDispParams->cArgs -1)
      For i As Long = 0 to pDispParams->cArgs -1
         Info.EventParameters.Item(i).Value = pDispParams->rgvarg[i]
      Next
   End If
   This. _DAcadApplicationEvents_ObjectEvent(Info)
   Function = 0
End Function
Sub AcadDocument__DAcadDocumentEvents. _DAcadDocumentEvents_ObjectEvent(ByVal Info As EventInfo)
   Select Case Info.EventID
      Case &H1      'BeginSave
         If BeginSave then BeginSave(info.EventParameters.Item(0).Value.bstrVal)
      Case &H2      'EndSave
         If EndSave then EndSave(info.EventParameters.Item(0).Value.bstrVal)
      Case &H6      'BeginCommand
         If BeginCommand then BeginCommand(info.EventParameters.Item(0).Value.bstrVal)
      Case &H7      'EndCommand
         If EndCommand then EndCommand(info.EventParameters.Item(0).Value.bstrVal)
      Case &H8      'BeginLisp
         If BeginLisp then BeginLisp(info.EventParameters.Item(0).Value.bstrVal)
      Case &H9      'EndLisp
         If EndLisp then EndLisp()
      Case &HA      'LispCancelled
         If LispCancelled then LispCancelled()
      Case &HB      'SelectionChanged
         If SelectionChanged then SelectionChanged()
      Case &HC      'Activate
         If Activate then Activate()
      Case &HD      'Deactivate
         If Deactivate then Deactivate()
      Case &HE      'BeginRightClick
         If BeginRightClick then BeginRightClick(info.EventParameters.Item(0).Value.pvarVal)
      Case &HF      'BeginShortcutMenuDefault
         If BeginShortcutMenuDefault then BeginShortcutMenuDefault(info.EventParameters.Item(0).Value.byref)
      Case &H10      'BeginShortcutMenuEdit
         If BeginShortcutMenuEdit then BeginShortcutMenuEdit(info.EventParameters.Item(0).Value.byref, info.EventParameters.Item(1).Value.byref)
      Case &H11      'BeginShortcutMenuCommand
         If BeginShortcutMenuCommand then BeginShortcutMenuCommand(info.EventParameters.Item(0).Value.byref, info.EventParameters.Item(1).Value.bstrVal)
      Case &H12      'BeginShortcutMenuGrip
         If BeginShortcutMenuGrip then BeginShortcutMenuGrip(info.EventParameters.Item(0).Value.byref)
      Case &H13      'BeginShortcutMenuOsnap
         If BeginShortcutMenuOsnap then BeginShortcutMenuOsnap(info.EventParameters.Item(0).Value.byref)
      Case &H1E      'EndShortcutMenu
         If EndShortcutMenu then EndShortcutMenu(info.EventParameters.Item(0).Value.byref)
      Case &H14      'BeginDoubleClick
         If BeginDoubleClick then BeginDoubleClick(info.EventParameters.Item(0).Value.pvarVal)
      Case &H15      'ObjectAdded
         If ObjectAdded then ObjectAdded(info.EventParameters.Item(0).Value.pdispVal)
      Case &H16      'ObjectErased
         If ObjectErased then ObjectErased(info.EventParameters.Item(0).Value.lVal)
      Case &H17      'ObjectModified
         If ObjectModified then ObjectModified(info.EventParameters.Item(0).Value.pdispVal)
      Case &H18      'BeginPlot
         If BeginPlot then BeginPlot(info.EventParameters.Item(0).Value.bstrVal)
      Case &H19      'EndPlot
         If EndPlot then EndPlot(info.EventParameters.Item(0).Value.bstrVal)
      Case &H1D      'WindowMovedOrResized
         If WindowMovedOrResized then WindowMovedOrResized(info.EventParameters.Item(0).Value.lVal, info.EventParameters.Item(1).Value.boolVal)
      Case &H1F      'LayoutSwitched
         If LayoutSwitched then LayoutSwitched(info.EventParameters.Item(0).Value.bstrVal)
      Case &H20      'WindowChanged
         If WindowChanged then WindowChanged(info.EventParameters.Item(0).Value.byref)
      Case &H21      'BeginClose
         If BeginClose then BeginClose()
      Case &H22      'BeginDocClose
         If BeginDocClose then BeginDocClose(info.EventParameters.Item(0).Value.boolVal)
   End Select
End Sub
CONSTRUCTOR AcadDocument__DAcadDocumentEvents()
   IIDFromString(IID__DAcadDocumentEvents, @Base.EventIID)
END CONSTRUCTOR
Function AcadDocument__DAcadDocumentEvents.Invoke(ByVal dispIdMember As DISPID, ByVal riid As Const IID Const Ptr, ByVal lcid As LCID, ByVal wFlags As WORD, ByVal pDispParams As DISPPARAMS Ptr, ByVal pVarResult As VARIANT Ptr, ByVal pExcepInfo As EXCEPINFO Ptr, ByVal puArgErr As UINT Ptr) As HRESULT
   Dim Info as EventInfo
   Info.EventID = dispIdMember
   Info.EventParameters.Count = pDispParams->cArgs
   If pDispParams->cArgs > 0 Then
      ReDim Info.EventParameters.Item(pDispParams->cArgs -1)
      For i As Long = 0 to pDispParams->cArgs -1
         Info.EventParameters.Item(i).Value = pDispParams->rgvarg[i]
      Next
   End If
   This. _DAcadDocumentEvents_ObjectEvent(Info)
   Function = 0
End Function
